home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Pascal / Libraries / DBL Pascal Library / DebuggerTest ƒ / DebuggerTest_Test.p < prev    next >
Encoding:
Text File  |  1993-12-17  |  331 b   |  19 lines  |  [TEXT/PJMM]
  1. program DebuggerTest_Test;
  2.  
  3.     uses
  4.         DebuggerTest;
  5.  
  6.     var
  7.         present, active: Boolean;
  8.         kind: DebuggerKind;
  9.         signature: DebuggerSignature;
  10.         actualDelay: Longint;
  11.  
  12. begin
  13.     ShowText;
  14.     GetDebuggerInfo(present, active, kind, signature);
  15.     WriteLn(present, ' ', kind, ' ', signature);
  16.     WriteLn(ABZmonIsLoaded);
  17.     repeat
  18.     until Button;
  19. end.